PC World Komputer 2000 July & August/EPA005.iso/Freeware/Genesis II terrain builder/_SETUP.1/Genesis2.exe/0/RCDATA/TMAINFORM/TMAINFORM.txt

Text File | 1999-10-16 | 7KB | 273 lines

object MainForm: TMainForm
  Left = 165
  Top = 195
  Width = 797
  Height = 558
  Caption = 'GenesisII'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIForm
  Menu = MainMenu
  OldCreateOrder = True
  ShowHint = True
  WindowMenu = WindowMenu
  OnClose = FormClose
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  OnHelp = FormHelp
  PixelsPerInch = 96
  TextHeight = 13
  object StatusBar: TStatusBar
    Left = 0
    Top = 493
    Width = 789
    Height = 19
    Panels = <
      item
        Bevel = pbNone
        Style = psOwnerDraw
        Text = 'TStatusPanel'
        Width = 100
      end
      item
        Width = 300
      end
      item
        Width = 200
      end
      item
        Width = 200
      end>
    SimplePanel = False
  end
  object MainMenu: TMainMenu
    Left = 8
    Top = 384
    object File1: TMenuItem
      Caption = '&System'
      object SystemPreferences: TMenuItem
        Caption = '&Preferences'
        OnClick = SystemPreferencesClick
      end
      object Debug1: TMenuItem
        Caption = 'Debug'
        Visible = False
        OnClick = Debug1Click
      end
      object N5: TMenuItem
        Caption = '-'
      end
      object ExitMenuItem: TMenuItem
        Caption = 'E&xit'
        OnClick = ExitMenuItemClick
      end
    end
    object ProjectMenu: TMenuItem
      Caption = '&Projects'
      object NewProjectMenuItem: TMenuItem
        Caption = '&New Project...'
        OnClick = NewProjectMenuItemClick
      end
      object OpenProjectMenuItem: TMenuItem
        Caption = '&Open Project...'
        OnClick = OpenProjectMenuItemClick
      end
      object EditProjectInfo: TMenuItem
        Caption = '&Edit Project Info...'
        OnClick = EditProjectInfoClick
      end
      object N4: TMenuItem
        Caption = '-'
      end
      object SaveProjectMenuItem: TMenuItem
        Caption = '&Save Project...'
        OnClick = SaveProjectMenuItemClick
      end
      object SaveProjectAsMenuItem: TMenuItem
        Caption = 'Save Project &As...'
        OnClick = SaveProjectAsMenuItemClick
      end
      object N2: TMenuItem
        Caption = '-'
      end
      object ExportSettings: TMenuItem
        Caption = 'E&xport Environment Settings...'
        OnClick = ExportSettingsClick
      end
      object ImportSettings: TMenuItem
        Caption = '&Import Environment Settings...'
        OnClick = ImportSettingsClick
      end
      object EnvironmentalWizardMenuItem: TMenuItem
        Caption = 'Environmental &Wizard...'
        OnClick = EnvironmentalWizardMenuItemClick
      end
      object N1: TMenuItem
        Caption = '-'
      end
      object PreferencesMenuItem: TMenuItem
        Caption = '&Preferences'
        OnClick = PreferencesMenuItemClick
      end
      object N7: TMenuItem
        Caption = '-'
      end
    end
    object ModulesMenu: TMenuItem
      Caption = '&Modules'
      GroupIndex = 5
      object AtmosphereEditorMenuItem: TMenuItem
        Caption = '&Atmosphere Editor...'
        OnClick = AtmosphereEditorMenuItemClick
      end
      object CameraEditorMenuItem: TMenuItem
        Caption = 'Ca&mera/Target Editor...'
        OnClick = CameraEditorMenuItemClick
      end
      object CloudsEditorMenuItem: TMenuItem
        Caption = '&Clouds Editor...'
        OnClick = CloudsEditorMenuItemClick
      end
      object EcologyEditorMenuItem: TMenuItem
        Caption = '&Ecology Editor...'
        OnClick = EcologyEditorMenuItemClick
      end
      object FractalEditorMenuItem: TMenuItem
        Caption = '&Fractal Editor...'
        OnClick = FractalEditorMenuItemClick
      end
      object LandscapeEditorMenuItem: TMenuItem
        Caption = '&Landscape Editor...'
        OnClick = LandscapeEditorMenuItemClick
      end
      object OverlayEditorMenuItem: TMenuItem
        Caption = '&Overlay Editor...'
        OnClick = OverlayEditorMenuItemClick
      end
      object TerrainEditorMenuItem: TMenuItem
        Caption = '&Terrain Layers Editor...'
        OnClick = TerrainEditorMenuItemClick
      end
      object PlantsEditorMenuItem: TMenuItem
        Caption = '&Vegetation Editor...'
        OnClick = PlantsEditorMenuItemClick
      end
      object UrbanEditorMenuItem: TMenuItem
        Caption = '&Urban Editor...'
        OnClick = UrbanEditorMenuItemClick
      end
      object WaterEditorMenuItem: TMenuItem
        Caption = '&Water Editor...'
        OnClick = WaterEditorMenuItemClick
      end
    end
    object RenderingMenu: TMenuItem
      Caption = '&Rendering'
      GroupIndex = 10
      object FractalRenderMenuItem: TMenuItem
        Caption = '&Fractal Renderer...'
        OnClick = FractalRenderMenuItemClick
      end
      object OverlayRenderMenuItem: TMenuItem
        Caption = '&Overlay Renderer...'
        OnClick = OverlayRenderMenuItemClick
      end
    end
    object GISMenu: TMenuItem
      Caption = 'Plugin &Interfaces'
      GroupIndex = 10
    end
    object WindowMenu: TMenuItem
      Caption = '&Window'
      GroupIndex = 10
      object Tile1: TMenuItem
        Caption = '&Tile'
        OnClick = Tile1Click
      end
      object Cascade1: TMenuItem
        Caption = '&Cascade'
        OnClick = Cascade1Click
      end
      object ArrangeAll1: TMenuItem
        Caption = '&Arrange All'
        OnClick = ArrangeAll1Click
      end
      object N6: TMenuItem
        Caption = '-'
      end
    end
    object HelpMenu: TMenuItem
      Caption = '&Help'
      GroupIndex = 99
      object HelpContentsItem: TMenuItem
        Caption = '&Contents'
        Hint = 'Display the help contents screen'
        OnClick = HelpContents
      end
      object HelpSearchItem: TMenuItem
        Caption = '&Search for Help On...'
        Hint = 'Search help file for a topic'
        OnClick = HelpSearch
      end
      object N3: TMenuItem
        Caption = '-'
      end
      object HelpAboutItem: TMenuItem
        Caption = '&About...'
        Hint = 'Show program information'
        OnClick = HelpAbout
      end
    end
  end
  object OpenProjectDialog: TOpenDialog
    DefaultExt = 'gs2'
    Filter = 'Genesis2 Project|*.gs2'
    Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist, ofEnableSizing]
    Left = 40
    Top = 384
  end
  object SaveProjectDialog: TSaveDialog
    DefaultExt = 'gs2'
    Filter = 'Genesis2 Project|*.gs2'
    Options = [ofOverwritePrompt, ofHideReadOnly, ofPathMustExist, ofEnableSizing]
    Left = 72
    Top = 384
  end
  object IceLock1: tIceLock
    IceString1 = 'GenesisII'
    IceString2 = 'Geomantics Ltd'
    IceSeed1 = 15912901
    IceSeed2 = 13212685
    ProgramKey1 = -399040758
    ProgramKey2 = -1332443667
    KeyFile = 'c:\windows\excel96.ini'
    TrialDays = 255
    DemoLicense = True
    ExpirationDate = 35596.000000000000000000
    Left = 104
    Top = 384
  end
  object OpenIniDialog: TOpenDialog
    DefaultExt = 'ini'
    Filter = 'Settings|*.ini'
    Left = 136
    Top = 384
  end
  object SaveIniDialog: TSaveDialog
    DefaultExt = 'ini'
    Filter = 'Settings|*.ini'
    Left = 168
    Top = 384
  end
  object OpenScriptDialog: TOpenDialog
    Filter = 'Script file (*.srp)|*.srp'
    Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist, ofEnableSizing]
    Left = 200
    Top = 384
  end
end